home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 52 / Amiga Format AFCD52 (Issue 136, May 2000).iso / -serious- / programming / other / whdload / rawdic17.lha / Examples / FutureTank.islave.asm < prev    next >
Assembly Source File  |  1999-03-01  |  2KB  |  57 lines
  1.  
  2.     ; Future Tank imager
  3.  
  4.     ; The disk is in a standard DOS 11-sector format with the only
  5.     ; difference that starting from track 20 another sync word ($4A84)
  6.     ; is used.
  7.  
  8.     ; Track 93 is used to save the highscore table. this track is skipped
  9.     ; due to the fact that the highscore saver of the game is unstable
  10.     ; and sometimes produces unreadable tracks.
  11.  
  12.     ; I have installed a pseudo-decoder for track 93 which generates an empty
  13.     ; highscore table.
  14.  
  15.         incdir    Includes:
  16.         include    RawDIC.i
  17.  
  18.         SLAVE_HEADER
  19.         dc.b    1    ; Slave version
  20.         dc.b    0    ; Slave flags
  21.         dc.l    DSK_1    ; Pointer to the first disk structure
  22.         dc.l    Text    ; Pointer to the text displayed in the imager window
  23.  
  24.         dc.b    "$VER:"
  25. Text:        dc.b    "Future Tank imager V1.0",10,"by John Selck on 01.03.1999",0
  26.         cnop    0,4
  27.  
  28. DSK_1:        dc.l    0        ; Pointer to next disk structure
  29.         dc.w    1        ; Disk structure version
  30.         dc.w    0        ; Disk flags
  31.         dc.l    TL_1        ; List of tracks which contain data
  32.         dc.l    0        ; UNUSED, ALWAYS SET TO 0!
  33.         dc.l    FL_DISKIMAGE    ; List of files to be saved
  34.         dc.l    0        ; Table of certain tracks with CRC values
  35.         dc.l    0        ; Alternative disk structure, if CRC failed
  36.         dc.l    0        ; Called before a disk is read
  37.         dc.l    0        ; Called after a disk has been read
  38.  
  39. TL_1:        TLENTRY    0,19,$1600,SYNC_STD,DMFM_STD
  40.         TLENTRY    20,92,$1600,$4A84,DMFM_STD
  41.         TLENTRY    93,93,$1600,$4A84,DMFM_FT_hiscore    ; empty highscore table
  42.         TLENTRY    94,159,$1600,$4A84,DMFM_STD
  43.         TLEND
  44.  
  45. DMFM_FT_hiscore:
  46.  
  47.         move.l    #$0100*10000,d0
  48.         move.l    #"    ",d1
  49. .l0        move.l    d0,(a1)+
  50.         move.l    d1,(a1)+
  51.         move.l    d1,(a1)+
  52.         sub.l    #$0100*1000,d0
  53.         bne.b    .l0
  54.  
  55.         moveq    #IERR_OK,d0
  56.         rts
  57.